home *** CD-ROM | disk | FTP | other *** search
/ Aminet 31 / Aminet 31 (1999)(Schatztruhe)[!][Jun 1999].iso / Aminet / dev / basic / ubbinstall.lha / UltimateBB_CD / InstallBlitz2 next >
Text File  |  1999-04-07  |  4KB  |  190 lines
  1. ; ask where we are installing Blitz 2 from
  2. (set B2SRC
  3.     (askdir
  4.         (prompt "Please specify the source location you want to install from.")
  5.         (help @askdir-help)
  6.         (default "BlitzCD:")
  7.     )
  8. )
  9.  
  10. ; ask where to install Blitz2
  11. (set UpdateS_text
  12.       (cat
  13.             "One moment please, updating S:User0Startup"
  14.             newline
  15.             newline
  16.       )
  17. )
  18.  
  19. (set UpdateSPrompt_text
  20.       (cat
  21.       "A Blitz2: assignment needs to be added to the \"S:User-Startup\" "
  22.       "so that your system will be properly configured to use Blitz2."
  23.    )
  24. )
  25.  
  26. (set UpdateSPrompt_texts
  27.       (cat
  28.       "A Blitzlibs: assignment needs to be added to the \"S:User-Startup\" "
  29.       "so that your system will be properly configured to use Blitz2."
  30.    )
  31. )
  32.  
  33.  
  34.  
  35. (set #progname
  36. (cat "Blitz2"
  37. ))
  38.  
  39. (set #prognames
  40. (cat "Blitzlibs"
  41. ))
  42.  
  43.  
  44. (set vc-dest
  45. (askdir
  46.    (prompt "Please select the Directory where you would like to install"
  47.            " Blitz2. (A directory called Blitz2 WILL be created.)")
  48.    (help @askdir-help)
  49.    (default @default-dest)
  50.    )
  51. )
  52.  
  53. (set @default-dest vc-dest)
  54. (set BB  (tackon @default-dest #progname))
  55. (makedir BB)
  56. (makedir (tackon BB #prognames))
  57.  
  58.  
  59. (
  60. (working "Installing Blitz2 Program")
  61. (copyfiles
  62.          (prompt "")
  63.          (help @copyfiles-help)
  64.          (source (tackon B2SRC "Blitz2/Blitz2"))
  65.          (dest BB)
  66.          (infos)
  67. )
  68. )
  69.  
  70. (
  71. (working "Installing Ted Program")
  72. (copyfiles
  73.          (prompt "")
  74.          (help @copyfiles-help)
  75.          (source (tackon B2SRC "Blitz2/Ted"))
  76.          (dest BB)
  77.          (infos)
  78. )
  79. )
  80.  
  81. (
  82. (working "Installing acidlibs")
  83. (copyfiles
  84.          (prompt "")
  85.          (help @copyfiles-help)
  86.          (source (tackon B2SRC "Blitz2/acidlibs"))
  87.          (dest BB)
  88.          (infos)
  89. )
  90. )
  91.  
  92. (
  93. (working "Installing defaultdbug")
  94. (copyfiles
  95.          (prompt "")
  96.          (help @copyfiles-help)
  97.          (source (tackon B2SRC "Blitz2/defaultdbug"))
  98.          (dest BB)
  99.          (infos)
  100. )
  101. )
  102.  
  103. (
  104. (working "Installing deflibs")
  105. (copyfiles
  106.          (prompt "")
  107.          (help @copyfiles-help)
  108.          (source (tackon B2SRC "Blitz2/deflibs"))
  109.          (dest BB)
  110.          (infos)
  111. )
  112. )
  113.  
  114. (
  115. (working "Installing help")
  116. (copyfiles
  117.          (prompt "")
  118.          (help @copyfiles-help)
  119.          (source (tackon B2SRC "Blitz2/help"))
  120.          (dest BB)
  121.          (infos)
  122. )
  123. )
  124.  
  125. (
  126. (working "Installing help.dat")
  127. (copyfiles
  128.          (prompt "")
  129.          (help @copyfiles-help)
  130.          (source (tackon B2SRC "Blitz2/help.dat"))
  131.          (dest BB)
  132.          (infos)
  133. )
  134. )
  135.  
  136. (
  137. (working "Installing BlitzLibs directory")
  138. (copyfiles
  139.     (prompt "")
  140.     (help @copyfiles-help)
  141.     (source (tackon B2SRC "Extras/Blitzlibs"))
  142.     (dest (tackon BB #prognames))
  143.     (infos)
  144.     (all)
  145. )
  146. )
  147.  
  148. (startup "Blitz2"
  149.          (prompt UpdateSPrompt_text)
  150.          (help @startup-help)
  151.          (command "ASSIGN Blitz2: " quote BB quote newline)
  152. )
  153.  
  154. (makeassign "Blitz2" BB)
  155.  
  156. (set @default-dest BB)
  157. (set BB  (tackon @default-dest #prognames))
  158.  
  159.  
  160. (startup "Blitzlibs"
  161.          (prompt UpdateSPrompt_texts)
  162.          (help @startup-help)
  163.          (command "ASSIGN Blitzlibs: " quote BB quote newline)
  164. )
  165.  
  166. (makeassign "Blitzlibs" BB)
  167.  
  168. (set installer_prog (tackon b2src "installer"))
  169. (set bss_script (tackon b2src "Bss1/Install"))
  170.  
  171. (execute "instbss"
  172.     (prompt "Installing the RWE Blitz Support Suite")
  173. )
  174.  
  175. (protect "Blitz2:REDHelp/Red_Help" "+s")
  176. (protect "Blitz2:REDHelp/RED_Help.rx" "+s")
  177. (protect "Blitz2:REDHelp/Showexample" "+s")
  178.  
  179. (message "You should download the patches to the SuperTEd and REDDebugger"
  180.          "from http://www.ldngedge.demon.co.uk/amigapatches_f.html"
  181.          "\n\n"
  182.          "You should download a bug-fixed version of the acidlibs file"
  183.          "from http://www.geocities.com/SiliconValley/Pines/4814/BBLIBS.HTM"
  184.          "\n\n"
  185.          "You should also download the latest version of the amigalibs.res"
  186.          "file, which is in the NewCommandSet.lha archive, in dev/basic"
  187.          "on your local Aminet mirror (http://de.aminet.net/aminet if"
  188.          "you don't know where Aminet is")
  189. (exit)
  190.